home *** CD-ROM | disk | FTP | other *** search
- VERSION 5.00
- Object = "{083C8784-F106-4CC2-9930-876218A6B74C}#1.1#0"; "ciaXPButton.ocx"
- Begin VB.Form Form2
- AutoRedraw = -1 'True
- Caption = "XP Style Command Button Demo, Page 2"
- ClientHeight = 2265
- ClientLeft = 60
- ClientTop = 450
- ClientWidth = 7290
- LinkTopic = "Form2"
- LockControls = -1 'True
- Picture = "Form2.frx":0000
- ScaleHeight = 2265
- ScaleWidth = 7290
- StartUpPosition = 3 'Windows Default
- Begin ciaXPButton.XPButton XPButton1
- Height = 525
- Left = 600
- TabIndex = 5
- Top = 600
- Width = 1470
- _ExtentX = 2593
- _ExtentY = 926
- ButtonStyle = 0
- Picture = "Form2.frx":36322
- PictureWidth = 20
- PictureHeight = 20
- PictureSize = 2
- OriginalPicSizeW= 20
- OriginalPicSizeH= 20
- PictureHover = "Form2.frx":3687C
- BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
- Name = "MS Sans Serif"
- Size = 8.25
- Charset = 0
- Weight = 400
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- MouseIcon = "Form2.frx":36DD6
- MousePointer = 99
- ShowFocusRect = 0 'False
- BackStyle = 0
- DropDown = -1 'True
- LicValid = -1 'True
- End
- Begin ciaXPButton.XPButton XPButton2
- Height = 525
- Left = 2820
- TabIndex = 6
- Top = 600
- Width = 1470
- _ExtentX = 2593
- _ExtentY = 926
- ButtonStyle = 2
- Picture = "Form2.frx":370F0
- PictureWidth = 20
- PictureHeight = 20
- PictureSize = 2
- OriginalPicSizeW= 20
- OriginalPicSizeH= 20
- PictureHover = "Form2.frx":3764A
- BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
- Name = "MS Sans Serif"
- Size = 8.25
- Charset = 0
- Weight = 400
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- MouseIcon = "Form2.frx":37BA4
- MousePointer = 99
- BackStyle = 0
- DropDown = -1 'True
- LicValid = -1 'True
- End
- Begin ciaXPButton.XPButton XPButton3
- Height = 525
- Left = 5265
- TabIndex = 7
- Top = 600
- Width = 1470
- _ExtentX = 2593
- _ExtentY = 926
- ButtonStyle = 2
- Picture = "Form2.frx":37EBE
- PictureWidth = 20
- PictureHeight = 20
- PictureSize = 2
- OriginalPicSizeW= 20
- OriginalPicSizeH= 20
- PictureHover = "Form2.frx":38418
- BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
- Name = "MS Sans Serif"
- Size = 8.25
- Charset = 0
- Weight = 400
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- MouseIcon = "Form2.frx":38972
- MousePointer = 99
- BackStyle = 0
- LicValid = -1 'True
- End
- Begin ciaXPButton.XPButton ciaButton9
- Height = 360
- Left = 4890
- TabIndex = 8
- Top = 1755
- Width = 1065
- _ExtentX = 1879
- _ExtentY = 635
- Caption = "Next >>"
- OriginalPicSizeW= 0
- OriginalPicSizeH= 0
- BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
- Name = "MS Sans Serif"
- Size = 8.25
- Charset = 0
- Weight = 400
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- MouseIcon = "Form2.frx":38C8C
- MousePointer = 99
- LicValid = -1 'True
- End
- Begin ciaXPButton.XPButton ciaButton10
- Height = 360
- Left = 6030
- TabIndex = 9
- Top = 1755
- Width = 1065
- _ExtentX = 1879
- _ExtentY = 635
- Caption = "Exit"
- OriginalPicSizeW= 0
- OriginalPicSizeH= 0
- BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
- Name = "MS Sans Serif"
- Size = 8.25
- Charset = 0
- Weight = 400
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- MouseIcon = "Form2.frx":38FA6
- MousePointer = 99
- LicValid = -1 'True
- End
- Begin VB.Label Label3
- AutoSize = -1 'True
- BackStyle = 0 'Transparent
- Caption = "Windows XPIE w/o DropDown"
- Height = 195
- Index = 3
- Left = 4950
- TabIndex = 4
- Top = 1245
- Width = 2205
- End
- Begin VB.Label Label3
- AutoSize = -1 'True
- BackStyle = 0 'Transparent
- Caption = "Windows XPIE w/DropDown"
- Height = 195
- Index = 2
- Left = 2580
- TabIndex = 3
- Top = 1245
- Width = 2070
- End
- Begin VB.Label Label3
- AutoSize = -1 'True
- BackStyle = 0 'Transparent
- Caption = "Office XP w/DropDown"
- Height = 195
- Index = 0
- Left = 480
- TabIndex = 2
- Top = 1230
- Width = 1680
- End
- Begin VB.Label Label2
- BackStyle = 0 'Transparent
- Caption = "Transparent Features"
- BeginProperty Font
- Name = "MS Sans Serif"
- Size = 12
- Charset = 0
- Weight = 700
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- Height = 345
- Left = 135
- TabIndex = 1
- Top = 120
- Width = 2790
- End
- Begin VB.Label Label1
- BackStyle = 0 'Transparent
- Caption = $"Form2.frx":392C0
- Height = 660
- Left = 435
- TabIndex = 0
- Top = 1575
- Width = 3990
- WordWrap = -1 'True
- End
- Attribute VB_Name = "Form2"
- Attribute VB_GlobalNameSpace = False
- Attribute VB_Creatable = False
- Attribute VB_PredeclaredId = True
- Attribute VB_Exposed = False
- Private Sub ciaButton10_Click()
- End Sub
- Private Sub ciaButton9_Click()
- Form3.Show
- Unload Me
- End Sub
- Private Sub Form_Load()
- Me.Move (Screen.Width - Me.ScaleWidth) \ 2, (Screen.Height - Me.ScaleHeight) \ 2
- End Sub
-